home *** CD-ROM | disk | FTP | other *** search
/ American History: Interactive Maps & User's Guide / American History: Interactive Maps & User's Guide.iso / pc / IMAP13 / XIMAP13.dxr / 00165_go to the review script.ls < prev    next >
Encoding:
Text File  |  2000-01-25  |  324 b   |  18 lines
  1. on mouseDown
  2.   puppetSprite(5, 1)
  3.   swapCast(5, "blue button down")
  4.   puppetSound("click")
  5.   updateStage()
  6.   set waithere to the ticks
  7.   repeat while the ticks < (waithere + 20)
  8.   end repeat
  9. end
  10.  
  11. on mouseUp
  12.   puppetSprite(5, 0)
  13.   swapCast(5, "blue button")
  14.   updateStage()
  15.   puppetSound("click")
  16.   go(1, "ImapTest.dir")
  17. end
  18.